(:*******************************************************:)
(: Test: K-SeqSUMFunc-32                                 :)
(: Written by: Frans Englich                             :)
(: Date: 2007-11-22T11:31:23+01:00                       :)
(: Purpose: A test whose essence is: `sum((1 to 100)[. < 0], 0) eq 0`. :)
(:*******************************************************:)
sum((1 to 100)[. < 0], 0) eq 0